Mobiclic 47/MOBICLIC 47.ISO/mac/DATA/COMMUNS/MOBICLIC_MENUS.CST/00037_Script_37

Text File | 2002-09-19 | 399b | 29 lines

-- initialisation piste aide

global pisteAideRub, aideRub

on beginSprite
  set s = the currentSpriteNum
  masquerPistes s,s+1
  set pisteAideRub = s
  set aideRub=0
end

on mouseUp
  if aideRub=1 then
    do "aideRub"
    cursor -1
  end if
end

on mouseEnter
  if aideRub=1 then
    cursor 280
  end if
end

on mouseLeave
  if aideRub=1 then
    cursor -1
  end if
end